home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 3 / ct-rom iiib.zip / ct-rom iiib / WINDOWS / UTILITY / MODEM / GC101 / STOCKS.SCR < prev    next >
Text File  |  1993-07-30  |  1KB  |  53 lines

  1. ;
  2. ;***********************************************************************
  3. ;       WinCIS .94
  4. ;       Copyright(C) 1992
  5. ;       Larry Lee (76670,1471)
  6. ;       16038 Augusta Drive
  7. ;       Chino Hills, Ca 91709
  8. ;***********************************************************************
  9.  
  10. ; GO FULL SCREEN
  11. WINDOWSTATE MAXIMIZE
  12.  
  13. WAIT !
  14. SEND SET BRIEF YES^M
  15. WAIT !
  16. SEND SET PAGED NO^M
  17. WAIT !
  18. SEND SET BLANK YES^M
  19. WAIT !
  20. SEND GO CIS^M
  21. WAIT !
  22.  
  23. ; Erase Exitsing File if Any
  24. KILLFILE &MESSAGEPATH\STOCKS.TXT
  25.  
  26. ; ^M^J is the same as a CRLF
  27. ; Add a Title Line
  28. PUTFILE &MESSAGEPATH\STOCKS.TXT ^M^J
  29. PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
  30. PUTFILE &MESSAGEPATH\STOCKS.TXT *      S T O C K      R E P O R T       *^M^J
  31. PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
  32. PUTFILE &MESSAGEPATH\STOCKS.TXT * Date:    &Date^M^J 
  33. PUTFILE &MESSAGEPATH\STOCKS.TXT * Time:    &Time^M^J 
  34. PUTFILE &MESSAGEPATH\STOCKS.TXT * Name:    &UserName^M^J 
  35. PUTFILE &MESSAGEPATH\STOCKS.TXT * Account: &UserId^M^J 
  36. PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
  37. PUTFILE &MESSAGEPATH\STOCKS.TXT ^M^J
  38.  
  39. ; Start File Capture
  40. CAPTURE &MESSAGEPATH\STOCKS.TXT APPEND
  41. SEND QUOTE HRB^M
  42. WAIT !
  43.  
  44. ; Turn Off File Capture
  45. CAPTURE OFF
  46.  
  47. ; Shrink the screen Size
  48. ; WINDOWSTATE MINIMIZE
  49. ; Call Notepad
  50. ; SHELL NOTEPAD.EXE 1 &MESSAGEPATH\STOCKS.TXT
  51.  
  52. ; Logoff CIS and Exit the Terminal Window
  53. LOGOFF